home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 12 / 64er_Magazin_Sonderheft_12_86-12_1986_Markt__Technik_de_Side_A.d64 / bam neu (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  213b  |  13 lines
  1. 1 print"[147]diskette mit schutz einlegen und taste  druecken"
  2. 2 poke198,0:wait198,1:poke198,0
  3. 3 open1,8,15
  4. 4 tr=1:se=0:gosub12
  5. 5 fori=1to6
  6. 6 tr=i:se=i:gosub12
  7. 7 next
  8. 8 tr=35:se=16:gosub12
  9. 10 close1:end
  10. 11 :
  11. 12 print#1,"b-a 0",tr,se
  12. 13 return
  13.